perm filename PPSAV.TMP[S1,ALS] blob sn#483572 filedate 1979-10-21 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 WORD(S)
C00003 00003	    976    986    BREAK 2
C00005 ENDMK
C⊗;
 WORD(S)
LOWSEG :   1K +  403 WORD(S)

RUNTIME: 00:00.698      ELAPSED: 00:00:31.2      8141 CHARS
LOADING

LOADER 4+8 PAGES
EXECUTION
OUTPUT    = 
  PALINDROME FORMATION WITH REPEATED ADDITIONS TO MAXIMUM OF 100 DIGITS
DATA FOR 2-DIGIT DECIMAL NUMBERS
NMAX =  0  PALTOT =       90
DATA FOR 3-DIGIT DECIMAL NUMBERS
        96
       584
       770
NMAX =  0  PALTOT =      887
DATA FOR 4-DIGIT DECIMAL NUMBERS
       495
       496
       985
      3040
      3744
      5949
      6475
      6938
      6947
      7623
      7717
NMAX =  0  PALTOT =     8767

Exit
↑C
.ppsav
ppsav?

.r ppsav
    976    986    BREAK 2
NMIN = 229
996    907    917    927    937    947    957    967    977    987    997    908
    918    928    938    948    958    968    978    BREAK 2
NMIN = 224
988    998    909    
    23 MAX ADDS FOR   168 PALINDROMES, WITH    3 INTRANSIGENT NUMBERS

DATA FOR 4-DIGIT DECIMAL NUMBERS
0010    1010    2010    3010    4010    5010    6010    7010    8010    9010    
9011    9012    9013    9014    9015    9016    9017    9018    9019    0110    
1110    2110    3110    4110    5110    6110    7110    8110    9110    9111    
9112    9113    9114    9115    9116    9117    9118    9119    0210    1210    
2210    3210    4210    5210    6210    7210    8210    9210    9211    9212    
9213    9214    9215    9216    9217    9218    9219    0310    1310    2310    
3310    4310    5310    6310    7310    8310    9310    9311    9312    9313    
9314    9315    ↑C
↑C
↑C

.R PPSAV